home *** CD-ROM | disk | FTP | other *** search
/ Sun Solutions 1997 April to September / Sun Solutions CD - APR '97 - SEP '97 (704-3778-12 Rev. H)(Sun Microsystems, Inc.)(1997).iso / products / SunSolutions / script.txt < prev    next >
Text File  |  1996-06-03  |  7KB  |  327 lines

  1. (strip driver-strip
  2.     (set frames 6)
  3.     //(set loc [3 10 3 133 3 256 3 379 3 502 3 625])
  4.     //(set size [555 122])
  5.     (set loc [84 10 84 133 84 256 84 379 84 502 84 625])
  6.     (set size [119 122])
  7.     (set seq [0 1 2 3 4 5])
  8.     (set ticks[3])
  9.     (set image "drive.gif")
  10. )
  11. (strip road-strip
  12.     (set frames 3)
  13.     (set loc [240 10 240 133 240 256 240 379 240 502 240 625])
  14.     (set size [318 122])
  15.     (set seq [0 1 2])
  16.     (set ticks[2])
  17.     (set image "drive.gif")
  18. )
  19. (strip hair-strip
  20.     (set frames 3)
  21.     (set loc [45 10 45 133 45 256 45 379 45 502 45 625])
  22.     (set size [20 30])
  23.     (set seq [0 1 2 1 2 1 2 1 2 1])
  24.     (set ticks[8 3])
  25.     (set image "drive.gif")
  26. )
  27. (strip software-strip
  28.     (set frames 7)
  29.     (set loc [146 232 146 310 146 388 146 466 146 544 303 100 303 178])
  30.     (set size [130 76])
  31.     (set seq [-1 1 2 3 4 5 6 5 4 3 2 1])
  32.     (set ticks[4])
  33.     (set image "bigbutt.gif")
  34. )
  35. (strip hardware-strip
  36.     (set frames 7)
  37.     (set loc [1 147 1 231 0 315 1 399 1 483 1 567 146 147])
  38.     (set size [142 83])
  39.     (set seq [-1 1 2 3 4 5 6 5 4 3 2 1])
  40.     (set ticks[4])
  41.     (set image "bigbutt.gif")
  42. )
  43. (strip services-strip
  44.     (set frames 7)
  45.     (set loc [293 255 293 336 293 417 293 498 293 579 434 99 434 180])
  46.     (set size [139 79])
  47.     (set seq [-1 1 2 3 4 5 6 5 4 3 2 1])
  48.     (set ticks[4])
  49.     (set image "bigbutt.gif")
  50. )
  51. (strip comprod-strip
  52.     (set frames 5)
  53.     (set loc [434 261 434 367 434 473 434 579 146 621])
  54.     (set size [130 104])
  55.     (set seq [-1 1 2 3 4])
  56.     (set ticks[4])
  57.     (set image "bigbutt.gif")
  58. )
  59. (strip catalog-strip
  60.     (set frame 2)
  61.     (set loc [49 99])
  62.     (set size [50 48])
  63.     (set seq [-1 0])
  64.     (set image "bigbutt.gif")
  65. )
  66. (strip products-strip
  67.     (set frame 2)
  68.     (set loc [149 99])
  69.     (set size [50 48])
  70.     (set seq [-1 0])
  71.     (set image "bigbutt.gif")
  72. )
  73. (strip info-strip
  74.     (set frame 2)
  75.     (set loc [250 99])
  76.     (set size [50 48])
  77.     (set seq [-1 0])
  78.     (set image "bigbutt.gif")
  79. )
  80.  
  81. ///////////////////////////////////////////////////////////////////////
  82. // ACTORS
  83. ///////////////////////////////////////////////////////////////////////
  84.  
  85. (actor background
  86.     (on init
  87.         (set ticker-delay 30)
  88.         (set debug 0)
  89.     )
  90. )
  91. (actor driver
  92.     (on init
  93.         (set visible 2)
  94.         (set strip "driver-strip")
  95.         //(set loc [21 201])
  96.         (set loc [102 201])
  97.         (set timer -150)
  98.         (set run -8)
  99.     )
  100.     (on timer
  101. //minus stop on last frame
  102.         (set run -8)
  103.         (set timer -150)
  104.     )
  105.     (on movein
  106.         (set road.ticks [1])
  107.         (set ticks [1])
  108.         (set timer 0)
  109.         (set run 1)
  110.     )
  111.     (on moveout
  112.         (set road.ticks [2])
  113.         (set ticks[3])
  114.         (set timer -150)
  115.         (set run 0)
  116.     )
  117. )
  118. (actor road
  119.     (on init
  120.         (set visible 2)
  121.         (set strip "road-strip")
  122.         (set loc [258 201])
  123.         (set run 1)
  124.         (set forward 1)
  125.     )
  126.     (on down
  127.         (if forward 1
  128.             (set forward 0)
  129.          else
  130.             (set forward 1)
  131.         )
  132.     )
  133. )
  134. (actor hair
  135.     (on init
  136.         (set visible 2)
  137.         (set strip "hair-strip")
  138.         (set loc [63 201])
  139.         (set run 1)
  140.     )
  141. )
  142. (actor software
  143.     (on init
  144.         (set strip "software-strip")
  145.         (set loc [80 123])
  146.         (set timer 100)
  147.     )
  148.     (on timer
  149.         (set visible -1)    // forces preload gif
  150.     )
  151.     (on movein
  152.         (set run 1)
  153.     (set loop-sound -1)
  154.         (set sound "software.au")
  155.     )
  156.     (on moveout
  157.         (set stop-at 0)
  158.     )
  159.     (on down
  160.         (set url "http://localhost:7999/.categories/?DEST=Software")
  161.     )
  162. )
  163. (actor hardware
  164.     (on init
  165.         (set strip "hardware-strip")
  166.         (set loc [225 96])
  167.         (set loop-sound 1)
  168.     )
  169.     (on movein
  170.         (set run 1)
  171.     (set loop-sound -1)
  172.         (set sound "hardware.au")
  173.     )
  174.     (on moveout
  175.         (set stop-at 0)
  176.     )
  177.     (on down
  178.         (set url "http://localhost:7999/.categories/?DEST=Hardware")
  179.     )
  180. )
  181. (actor services
  182.     (on init
  183.         (set strip "services-strip")
  184.         (set loc [385 82])
  185.         (set loop-sound 1)
  186.     )
  187.     (on movein
  188.         (set run 1)
  189.     (set loop-sound -1)
  190.         (set sound "services.au")
  191.     )
  192.     (on moveout
  193.         (set stop-at 0)
  194.     )
  195.     (on down
  196.         (set url "http://localhost:7999/.categories/?DEST=Services")
  197.     )
  198. )
  199. (actor comprod
  200.     (on init
  201.         (set strip "comprod-strip")
  202.         (set loc [0 310])
  203.         (set loop-sound 1)
  204.     (set timer -200)
  205.     (set run 0)
  206.     )
  207.     (on timer
  208.     (if run 1
  209.             (set loop-sound 1)  // no-op
  210.      else 
  211.         (set ticks [1])
  212.             (set stop-at 0)
  213.         )
  214.     (set timer -200)
  215.     )
  216.     (on movein
  217.     (set ticks [4])
  218.         (set run 1)
  219.     (set loop-sound -1)
  220.         (set sound "compprod.au")
  221.     )
  222.     (on moveout
  223.         (set stop-at 0)
  224.     )
  225.     (on down
  226.         (set url "http://localhost:7999/.categories/?DEST=companies")
  227.     )
  228. )
  229. (actor prod
  230.     (on init
  231.         (set loc [4 365])
  232.         (set size [111 49])
  233.     )
  234.     (on movein
  235.         (set comprod.run 1)
  236.     (set loop-sound -1)
  237.         (set comprod.sound "compprod.au")
  238.     )
  239.     (on moveout
  240.         (set comprod.stop-at 0)
  241.     )
  242.     (on down
  243.         (set url "http://localhost:7999/.categories/?DEST=products")
  244.     )
  245. )
  246. (actor catalog
  247.     (on init
  248.         (set strip "catalog-strip")
  249.         (set loc [236 338])
  250.     )
  251.     (on movein
  252.     (set loop-sound -1)
  253.         (set sound "cat.au")
  254.     )
  255.     (on moveout
  256.     )
  257.     (on down
  258.         (set seqnum 1)
  259.     )
  260.     (on dragout
  261.         (set seqnum 0)
  262.     )
  263.     (on dragin
  264.         (set seqnum 1)
  265.     )
  266.     (on up
  267.         (set seqnum 0)
  268.         (set url "file:///tmp/httpd/.products/.wais/Catalog")
  269.     )
  270.     (on upout
  271.     )
  272. )
  273. (actor products
  274.     (on init
  275.         (set strip "products-strip")
  276.         (set loc [314 338])
  277.     )
  278.     (on movein
  279.     (set loop-sound -1)
  280.         (set sound "sunprod.au")
  281.     )
  282.     (on moveout
  283.     )
  284.     (on down
  285.         (set seqnum 1)
  286.     )
  287.     (on dragout
  288.         (set seqnum 0)
  289.     )
  290.     (on dragin
  291.         (set seqnum 1)
  292.     )
  293.     (on up
  294.         (set seqnum 0)
  295.         (set url "http://localhost:7999/.categories/?DEST=Sun")
  296.     )
  297.     (on upout
  298.     )
  299. )
  300. (actor info
  301.     (on init
  302.         (set strip "info-strip")
  303.         (set loc [394 338])
  304.     )
  305.     (on movein
  306.     (set loop-sound -1)
  307.         (set sound "info.au")
  308.     )
  309.     (on moveout
  310.     )
  311.     (on down
  312.         (set seqnum 1)
  313.     )
  314.     (on dragout
  315.         (set seqnum 0)
  316.     )
  317.     (on dragin
  318.         (set seqnum 1)
  319.     )
  320.     (on up
  321.         (set seqnum 0)
  322.         (set url "file:///tmp/httpd/.products/CDware/docs/info/Info")
  323.     )
  324.     (on upout
  325.     )
  326. )
  327.